home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 25 / CU Amiga Magazine's Super CD-ROM 25 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-08].iso / CUCD / Programming / GMS / GMSDev / EModules / gms / system / misc.e < prev    next >
Encoding:
Text File  |  1998-03-16  |  1.9 KB  |  73 lines
  1. /*
  2. **  $VER: misc.e V1.0
  3. **
  4. **  (C) Copyright 1996-1998 DreamWorld Productions.
  5. **      All Rights Reserved.
  6. **
  7. */
  8.  
  9. OPT MODULE
  10. OPT EXPORT
  11. OPT PREPROCESS
  12.  
  13. MODULE 'gms/dpkernel/dpkernel','gms/system/register','gms/input/joydata'
  14. MODULE 'gms/system/tasks','gms/graphics/screens'
  15.  
  16. /****************************************************************************
  17. ** Object Referencing structure.
  18. */
  19.  
  20. CONST VER_REFERENCE  = 1,
  21.       TAGS_REFERENCE = $FFFB0000 OR ID_REFERENCE
  22.  
  23. OBJECT reference
  24.   head[1]     :ARRAY OF head    /* Standard header */
  25.   next        :PTR TO reference /* Next reference */
  26.   prev        :PTR TO reference /* Previous reference */
  27.   classid     :INT              /* ID of the class */
  28.   pad         :INT              /* Reserved */
  29.   classname   :LONG             /* Name of the class */
  30.   modname     :LONG             /* Name of the module containing the object */
  31.   checkfile   :LONG             /* CheckFile code */
  32.   modnumber   :INT              /* Module ID number */
  33. ENDOBJECT
  34.  
  35. CONST REFA_ClassID   = TWORD OR 20,
  36.       REFA_ClassName = TAPTR OR 24,
  37.       REFA_ModName   = TAPTR OR 28,
  38.       REFA_CheckFile = TAPTR OR 32,
  39.       REDA_ModNumber = TWORD OR 36
  40.  
  41. /****************************************************************************
  42. ** Universal Structure, used in the CopyStructure() routine.
  43. */
  44.  
  45. OBJECT universe
  46.   head[1]         :ARRAY OF head
  47.   palette         :LONG   
  48.   planes          :INT   
  49.   width           :INT   
  50.   height          :INT   
  51.   insidewidth     :INT
  52.   insidebytewidth :INT
  53.   insideheight    :INT
  54.   task            :PTR TO dpktask
  55.   frequency       :LONG
  56.   amtcolours      :LONG
  57.   scrmode         :INT
  58.   bmptype         :INT
  59.   source          :LONG
  60.   joydata         :PTR TO joydata
  61.   raster          :PTR TO raster
  62.   xoffset         :INT
  63.   yoffset         :INT
  64.   insideyoffset   :INT
  65.   insidexoffset   :INT
  66.   channel         :INT
  67.   priority        :INT
  68.   length          :LONG
  69.   octave          :INT
  70.   volume          :INT
  71. ENDOBJECT
  72.  
  73.